#!perl -w
# Discard submissions prior to a given date, or discard all but the most recent given number of submissions.
